home *** CD-ROM | disk | FTP | other *** search
/ Mac-Source 1994 July / Mac-Source_July_1994.iso / Other Langs / MacPerl ƒ / Perl Source ƒ / MacPerl / Demo / PerlFromAppleScript < prev    next >
Text File  |  1993-08-18  |  96b  |  3 lines
  1. tell application "MacPerl"
  2.     Do Script "&MacPerl'Reply(join(\", \", stat(\"MacPerl\")))"
  3. end tell